home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / newsgroups / misc.20030409-20031118 / 000239_sonicechoesWit…pam@hotmail.com_Wed Aug 27 14:57:47 EDT 2003.msg < prev    next >
Text File  |  2020-01-01  |  2KB  |  73 lines
  1. Article: 14479 of comp.protocols.kermit.misc
  2. Path: newsmaster.cc.columbia.edu!panix!not-for-mail
  3. From: dgk <sonicechoes@hot-nospamp-mail.com>
  4. Newsgroups: comp.protocols.kermit.misc
  5. Subject: How to recover from a hangup?
  6. Date: Wed, 27 Aug 2003 13:24:49 -0400
  7. Organization: PANIX Public Access Internet and UNIX, NYC
  8. Lines: 52
  9. Message-ID: <uoppkvgocr6vgbptg62fm7osanrjhontk3@4ax.com>
  10. Reply-To: sonicechoesWithNoSpam@hotmail.com
  11. NNTP-Posting-Host: dsl027-158-082.nyc1.dsl.speakeasy.net
  12. Mime-Version: 1.0
  13. Content-Type: text/plain; charset=us-ascii
  14. Content-Transfer-Encoding: 7bit
  15. X-Trace: reader2.panix.com 1062005097 16321 216.27.158.82 (27 Aug 2003 17:24:57 GMT)
  16. X-Complaints-To: abuse@panix.com
  17. NNTP-Posting-Date: Wed, 27 Aug 2003 17:24:57 +0000 (UTC)
  18. X-Newsreader: Forte Agent 1.92/32.572
  19. Xref: newsmaster.cc.columbia.edu comp.protocols.kermit.misc:14479
  20.  
  21. I have an app that uses some of the K95 provided scripts and answers
  22. calls and has a simple dialog. I have a problem that results in the
  23. Kermit dos box printing this line over and over:
  24.  
  25. ?Connection on Conexant HCF V90 56K Data Fax PCI Modem is not open.
  26.  
  27.  
  28.  
  29. The script is kicked off by this section of code from Dhostmdm.KSC
  30.  
  31. ; Break out of loop if there is a nonrecoverable error, otherwise
  32. continue.
  33.  
  34. while 1 {
  35.     answer
  36.     if > \v(dialstatus) 0 if < \v(dialstatus) 22 stop 1 Fatal modem
  37. error
  38.     if = \v(dialstatus) 0 take MM3.ksc
  39.     echo Type Ctrl-C to exit...          ; Give user a chance to
  40. cancel
  41.     sleep 2
  42. }
  43.  
  44. MM3.KSC just asks for a username and password, and then a menu option
  45. here:
  46.  
  47. ASG \%T 0
  48. :GETCMD    ; What does the user want to do anyway?
  49. OUTPUT \13\10Command:
  50. CLEAR INPUT
  51. INPUT 10 \13
  52. DEF \%C
  53. DEF \%Z \V(INPUT)
  54. DO STRIP {\%Z}
  55. IF = \FLENGTH(\%Z) 0 GOTO GETCMD
  56. ASG \%C \%N
  57. IF EQUAL {\%C} SND GOTO RECEIVE
  58. IF EQUAL {\%C} {RCV R} GOTO SEND
  59. IF EQUAL {\%C} BYE GOTO IFAIL
  60. IF EQUAL {\%C} {RCV M} GOTO SENDM
  61. OUTPUT \13\10REQUEST ERROR|\%C|
  62. INC \%T 1
  63. IF = \%T 4 GOTO IFAIL
  64. GOTO GETCMD
  65.  
  66.  
  67. I'll be the first person to admit that I don't know much of the Kermit
  68. language but the code works some of the time that a user hangs up.
  69. Othertimes I get that line repeating and have to restart Kermit.
  70.  
  71. Is there some error checking I should be doing here to prevent the
  72. hangup from messing the modem up?
  73.